Java代理程序实现web方式管理邮件组成员

说到java大家并不陌生，java对于开发人员来说基础最早的开发语言之一，也是应用最多的，同时我们也知道，domino跟java是完美结合，domino可以根据自己的需求能优化很多功能级应用，同时我们介绍一下，通过B/S方式管理邮件组成员，添加程序后，如果添加的人员不在domino目录下，在保存的时候会在控制台输出，方便查找邮件投递故障。具体见下：

1．我们首先创建用户

创建邮件组，并且在邮件组内添加人员。

我们将user01、user02添加到group-01组内。

编辑好代理程序后，我们需要创建表单

然后

确认完以上信息后，接下来我们创建代理程序，在此我们通过java程序来实现。

为了保证不影响应用系统，建议创新新的数据库来新建表单及代理程序。

然后用desinger打开该数据库

编辑代理程序

import lotus.domino.*; import java.io.PrintWriter; import java.util.Vector; import java.lang.StringBuffer; public class JavaAgent extends AgentBase { public void NotesMain() { try { Session session = getSession(); AgentContext agentContext = session.getAgentContext(); Document note=agentContext.getDocumentContext(); String querystring=note.getItemValueString("query_string"); String[] queryArray=querystring.split("&"); querystring=queryArray[1].split("=")[1]; System.out.println("请求内容是:"+querystring); Database db=session.getDatabase(agentContext.getCurrentDatabase().getServer(), "names.nsf"); if(db.isOpen()){ } View personview=db.getView("_People"); View groupview=db.getView("Groups"); Document doc=groupview.getFirstDocument(); Document tempdoc=null; Document persondoc=null; StringBuffer sb=new StringBuffer(); while(doc!=null){ tempdoc=doc; if(doc.getItemValueString("ListName").equals(querystring)){ doc.appendItemValue("CN=Gavin/O=gavi000"); doc.save(); Vector v=session.evaluate("@name([ABBREVIATE];members)",doc); /* for(int i=0;i<v.size();i++){ persondoc=personview.getDocumentByKey(v.get(i),true); if(persondoc==null){ //MsgBox tempdoc.ListName(0) &"组下的"& key2(1) &"不在domino列表里！" System.out.println(doc.getItemValueString("ListName")+"组下的"+v.get(i)+"不在domino列表里！"); }else{ } }*/ if(v.size()>0){ for(int i=0;i<v.size()-1;i++){ sb.append(v.get(i)+","); } sb.append(v.get(v.size()-1)); } break; } doc=groupview.getNextDocument(doc); tempdoc.recycle(); } PrintWriter pw = getAgentOutput(); pw.println("Content-Type:text/plain;charset=gbk"); pw.println(sb.toString()); // (Your code goes here) } catch(Exception e) { e.printStackTrace(); } } }

首先我们要通过web去访问的话，先要创建表单及内部自定义的信息

新建名称为web_group的表单

定义显示主题，因为我们主题需要在页面居中，所以应用到了center参数，

<center>显示内容</center>

编辑好，显示内容将在也面的中间显示；

接着定义需要搜索的的邮件组输入框---域值，然后显示邮件组成员的maillist，及搜索键、保存键盘

Maillist定义文本及文本框的大小

文本需要换行来输入信息，可根据自己的需求来定义

定义搜索键的参数

xmlhttp=createXMLHttpRequest(); if(xmlhttp){ xmlhttp.open("GET","javajson?openagent&query="+document.forms[0].Mailgroup.value+"&t="+Math.random(),true); xmlhttp.onreadystatechange=function(){ if(xmlhttp.readyState==4 && xmlhttp.status==200){ document.forms[0].Maillist.value=xmlhttp.responseText.replace(/,/g,"\r\n"); } } xmlhttp.send(); }else alert("xmlhttp no found");

function createXMLHttpRequest(){ //var h=new ActiveXObject("Msxml2.XMLHTTP"); var h = new XMLHttpRequest(); return h; }

Document forms[0].submit();

接下来我们访问

接下来我们添加用户，然后如果添加的用户不在domino目录下保存，就会在控制台提示